EMULEX XENIX DRIVER EXAMPLE PACKAGE 


USER'S GUIDE 


aD 2 Ga 
® 
3545 Harbor Boulevard 


Costa Mesa, California 92626 VD9950903 Rev A 
(714) 662-5600 TWX 910-595-2521 August 1985 


Copyright (C) 1985 Emulex Corporation 


The information in this manual is for information purposes and is 
subject to change without notice. 


Emulex Corporation assumes no responsibility for any errors that may 
appear in the manual. 


Printed in U.S.A. 


TABLE OF CONTENTS 


Section 


rg 
9) 
iQ 
@ 


ONE GENERAL DESCRIPTION 


Dad, “ENFRODUCTION a. io:6.cs6: 55 e66 wwe Shwe rer ore ww ww ow Weve 0 050 W000 
1.2 PRODUCT OVERVIEW 2. cccccncccvccccccccccccccccccccsees 
1.3 DISTRIBUTION MEDIA .nccccccctevcccccvencncscecscsvcece 
1.4 COMPATIBILITY AND REQUIREMENTS ...ccccccrccccvccvvces 
1.4 
1.4 
1.5 


e 1 HARDW ARE @®eeoeoeoee#v#8se@8e0 @ os @eeeeseoeeoe@eesee#e*eeoe#eenee7ee7oee#ee#eest @eeee@¢ee ee 
e 2 SOFTWARE eeeeee4auoe#9e1ee¢eeeee2eo#s3408c8ceees#293e#2#eeeoeweeoee70en1eeee#eeeskeeeese ee @ 
REL ATE D DO CU MENTAT ION @eeeoeoeeeseeeeeee#eeeeee#eee##eee#?este 8eeee# @ @ 


en 
I 
NOM ON ON ON nei 


TWO SOURCE LISTING FOR DRIVER EXAMPLE 


2.1 OV ERV IEW eee oescod qagqeoeoeoeeeoe34«eeee21eos#4o@wesooedse@eno0d0e20e200@2060@0i0-@ee@mcwOWmcCOUmcCrHO OC Gee e ee e@ @ @ 8 @ 2 
2e2 SOURCE LISTING eeeeoeeoveoeee@eee4e4aoneeoeee4aeee#?teeoeeseeeeeeeeoeeoeeee em emhlUcthlUcP hO 2- 


iii 


BLANK 


Section 1 
GENERAL DESCRIPTION 


1.1 INTRODUCTION 


This manual explains the purpose and use of the Emulex Xenix Driver 
Example Package, which includes the following items: 


® Source text files on diskette 


@ Source listing with explanatory text 


1.2 PRODUCT OVERVIEW 


In order to use the Emulex MBO] Multibus Host Adapter ina Xenix 
operating system environment, you must first install a software 
Griver. The Emulex Xenix Driver presented in Section 2 of this 
document is an example of such a driver. 


This sample driver has been tested with the following system 
configuration: 


) Intel 310 CPU 

e Xenix operating system 

@ Emulex MDO1 (Medalist) SCSI disk controller 
® Emulex MTO1 (Titleist) SCSI tape controller 
S Emulex MBO1 Multibus host adapter 


Before using the driver, you must modify it as necessary to suit your 
system configuration and then integrate it into your operating 
system. 


NOTE 


Emulex does not support this driver, because it is 
not intended for use in all Multibus environments. 
Each system may have slightly different driver 
requirements that are not met by this example. 
This document assumes that the user has the 
expertise required to customize the driver. 


1-1 General Description 


Related Documentation 


1.3 DISTRIBUTION MEDIA 


As shown in Table 1-1, the driver is contained in two files on the 
distribution diskette: HA.H and HA.C. HA.H contains the definitions 
used by the driver, and HA.C contains the sample driver itself, with 
a source statement to include file HA.H. 


Table 1-1. Distribution Media 


ON ED CORRE LE eee ee ee —e — wee ew em eo 


Emulex P/N Description Contents : 
VD9960704 Xenix floppy diskette HA.H | 
HA.C : 


To retrieve these two files from the distribution diskette, use the 
Xenix tar command with the £ option to specify the special file name 
of the drive from which the diskette is to be read, and the x option 
to specify that files HA.C and HA.X are to be extracted. If the v 
(verbose) option is used, the screen will display a message stating 
that files HA.C and HA.X are being extracted. An example of this 
command follows: 


tar xfv /dev/rdf0<return> 


1.4 COMPATIBILITY AND REQUIREMENTS 

The Emulex Xenix Driver Example has been tested and found to be 
compatible with the Emulex MBO] Multibus Host Adapter, MDO1 
(Medalist) Disk Controller, MTO1 (Titleist) Tape Controller, and 
Intel 310 CPU. The user must modify the driver for use with other 
hardware configurations. 

1.4.2 SOFTWARE 

The Emulex Xenix Driver Example is adaptable for use with the Intel 


Xenix operating system. 


1.5 RELATED DOCUMENTATION 


Title: MBO1 Multibus Host Adapter Technical Manual 
Publication Number: HA5151001 
Publisher: Emulex Corporation 


3545 Harbor Blvd. 
Costa Mesa, CA 92626 
(714) 662-5600 TWX 910-595-2521 


General Description 1-2 


Section 2 
SOURCE LISTING FOR DRIVER EXAMPLE 


2-1 OVERVIEW 

This section contains the source listing for the Xenix driver example 
provided with this package. It was written for and testeaq ina 
specific configuration, and must be adapted to your specific 
requirements. 


2-2 SOURCE LISTING 


Figure 2-1 contains the source listing. 


tLuredef char UCHAK» 

#define ARTIROCONY Ox4000L, /K address conversion K/ 
#define ROUIOGCTL Ox4000 /*k ioctl I/0 flees for buf nheaederk/ 
#define SET ULOAR_LRIY 1 /% tare losad/unloed command ¥./ 
#define RESETULOANLKRIT 0 /% tare loed/unlosd command ¥/ 
#define TROWRITTEN ‘l /* wrote to tare ¥/ 
¥define TAFE Oxo /¥% mode tare fle¢s ¥/ 
#define TAPELIS_FRESENT TRUE /¥ tere rresent constant K/ 
#define TAFELNOTUWFRESENT FALSE /X tare mot frresent constant / 
¥define TMO_LINT 340 fK interrurt timeout K/ 
#define THOURES 400 /*% reselection timeout x / 
#define TIMER URESET 0 /% timer is mot set */ 
#define TIMERUSET ‘I /% timer is set k/ 
#define TIMERWRUNNNG ‘i /*% timer is sective */ 
¥define TIMER LNOT_URUNNING O /%¥% timer is inective K/ 
#define ARMLUTTMERCs) hatinfo.nhse_tma = Cx) 

#define INITURELAY pa @) /*% initislize time geley */ 
#define BITUUNIT OxSO 7*¥ messase in unit fles pit ¥/ 
define MAX SE O“LFPT Tf ~§/K 6 nvyte ioch block max value */ 
define MAX TOCHK_$Z pa) /¥% words max in iach K/ 
#define MAXURYTESWTUCKR MAXULUCBLUSZ * 2 /X max iocno tetes x7 
€define MAXUSCSTUUNITS 8 /* number of SCSI units on tus <*/ 
€qgefine MAX LUN 3) /%*% max LUNS rer SCSI device x / 
fdefine MAX SZ 20 /¥* max buffer union elements x7 
define MAX WATT IME Ont TT /* meximum timeout velue */ 
define MAXUERROKRS 2 /*% maximum I/0 errars sllowesd Ki 


Figure 2-1. Source Listing for Xenix Driver Example 
(Continued on next page) 


2-1 Source Listing 


/%*% Nefinitions 


tdefine 
#gefine 
¥dgefine 
€gefine 


f{define 
¥define 
fdefine 
define 
#jefine 
¥tdefine 
€qefine 


define 
#define 
fdefine 
#define 
fgefine 
#jefine 


define 


tifdef 
taefine 


felse 


Faefine 


fendif 


fFaefine 
define 


define 
#qgefine 
fqefine 
#fjefine 
#qgefine 
#define 
#define 
fdefine 


#define 
#¥define 


SZ_CHARS 


SZ. SHORTS 
SZ.INTS 
SZ.REPLY 


MHASKONIB 
MASK UBYTE 
MASK OWORT 
MASK OMEBUG 
HASKOUNTT 
HASK PHASES 
HASKOCNTREE 


SHIFT LUN 
SHIFTOFHASES 
SHIFTUBYTE 
SHIFT WORT 
SHIFTSCSI 
SHIFTOUNTT 


SWAP. INT C3) 
SWAP _USHORT Cx) 


SUR 


SWAF_BINT C3) 


SWAP_LRINT Ox) 


SEMOP REE 
SEM. RUSY 


PHOUUT LATA 
PHOIRUDATA 
FHCOMMANT! 
FHOSTATUS 
FH. BAN 

PHO BAT 
FHOOUT MSG 
FHOIN MSG 


GETUSTATE FLAG 
SETO.STATEFLAG CK) thre-® 


/% Fnese Staetes 


#define 
¥define 
#¥define 
#define 
#define 
¥define 
#¥define 


Figure 2-l. 


SF_USEL 
SF OUTCN 
SF OCME 
SF_UMSGI 
SF_LART 
SFoI0 

SF_URAT 


& Cryer Gi oN 


(Cds b> 
Cox x 
(Clix & 
Cin & 


CC CSWAP 


CTSWAF.. 


~ © 


NEO Chts GEIR 


C tigen ha 


Oondi 
oud02 
0x04 
0x08 
Oox“19 
Ox2O 


Source Listing 


#S chers, shorts or imt */ 
2S /X® pumber of chars ¥/ 
a 7K rumber of sharts */ 

/*¥ number of ints */ 
/% size of rerly K/ 
/*K mibtble mask. 7 
/*¥ bette mask */ 
/* word mask Xf 
/%® isolste value for he dehus *x/ 
/* mask for unit nummers K/ 
/* mask to isolste rhese nits K/ 
/% isolate controller hits *K/ 
7K LUN pit shifts 4/7 
/% ehase risht-alisned */ 
/*K num af bits for tute shift K/ 
/* pum of bits for words shift ie 
/*& for controller mumber K/ 
/K for unit in Be-Shdev */ 
SHIFTOWORIID & MHASKOUWDRD)D | N 
“=. SHIFTUWORTI) & MASKOUWORD) ) 
MASKUWORD) << SHIFTUBYTE)) | \ 
MASKOUWORN) => SHIFTUBYTE) 3) 
~SHORT Ox & MASKOWODRII) & MHASKOWORN) os 
CCSWAPLUSHORT (Cx? > SHIFTUWORD) & Oxf PPPRII NS 

LSHIF TOWORT) > 

SHORTOx) &@ Oxf fPFPLI FN 
OO: Stee oaaes VSHIFTOWORD) & OXF FFFLI N 

“<SHIFTOWORES & Oxf fT fTrOoOOL >) 

/*% semarhore avaeilahie Kf 
/% semarhore sllocseted K/ 
/% deta out SCSI bus rhese ¥/ 
/& date in rhese */ 
/*% command rhese K/ 
/* status rhase K/ 
/* non-existent rhase */ 
/% non-existent rhase *K/ 
/&k message out rhaese Kf 
/%®%& messese im rhese */ 
evlin => SHIFTUBYTE) 
hocvlin = tree?hoeglin | ¢¢s)0 <<) SHIFTUBYTE) 
*/ 
/*¥% selection stete */ 
/*& cdiscannected K/ 
/*% command comrlete state X/ 
/* messase in rhase X/ 
/*& ahort state */ 
/& 1/0 direction state x/ 
/*% date rhase state *K/ 


O40 


SO 


Source Listing for Xenix Driver Example (Cont'd) 


urce Listing 2-2 


#define 
#define 
¥define 


tdefine 
#define 


#define 
#define 
#define 


define 
#define 
#define 
#define 
define 
#define 


#define 
#define 
#define 
#define 


#define 
#define 
#define 
define 
#define 


#define 
#define 
#define 
define 
#define 
#define 


#define 
define 
#define 
#define 
#¥define 


fqefine 
tdefine 
#define 
define 
fgefine 


#gefine 
fgefine 
#Jjefine 
#define 
¥53efine 


#Foefine 


Figure 


2-3 Source 


Source Listing 


ecsiluinds) 
scsidevis) 
tscsidevi») 


TRUE 
FALSE 


SPL() 
INT..NORM.LEVEL 
INT..TMO_LEVEL 


FS 

FS_ROOT 
FS_SWAP 
FS_USR 
FS_FAST 
FS ROOT 


NISKOUNIVS 
TAFE UNITS 
CNTLRLUNITS 
HALUNTITS 


$3512 
SZ512 
$Z1024 
IN_TISK 
TUUTARE 


$Z.SMALL_OOK 
SZ_MERTUM_ DK 
SZ.LARGE OK 
TKOSMALL 
CR OMENTUM 
IK LARGE 


9. RL ASO ROGOT 
S. RLKS SWAP 
SW RLKS_USR 
S~RLAS FAST 
S.RLKRS BOOT 


MRLAS_ ROOT 
MBLKS_ SWAP 
MORLAS_USE 

MRLKS_FAST 
MOBRLKS ROOT 


LOBLASORUOT 
L.OELAS SWAP 
L_BELAS_USER 
LW BLAS_UPF AST 
LW RL KS ROOT 


INIT ONO 
INITUYES 
INIT OQONE 
2-1 @ 


Listing 


(tx ip 
Cox ce 


SHIFTLUNIT) & MASK_UNTT) 
SHIFTUSCST) & MASK-CNILR) 


C(x) & MASK UNIT) 


1 
0 


PIS) 


PIRI Rt bOI © Oh Oh vi 


jt 
8 


hee bo Of 


12000 
6000 
100 
100 


"xt: 
but 


16000 
8000 
300 
300 
3S 


het 


9) 
9) 
Oxn2625a00L 
0 
1 


7% 
7% 


7% 
7% 
/% 


7% 


/% 
7% 
/* 
/*% 


/*® 
/% 
/*% 
/* 
/*% 


7% 
7% 
7% 


Source Listing for 


. confisurstion 


define truth value 
define truth value 


he interrurt eriority level 
imterrurt level 
rsuedo interrurt level 


number of disk file systems 


numher of disks rer entrl 
number of teres rer cntrl 
number of disk controllers 
total controllers 


sector size of Siz hutes 
sector divide factor 
sector divide factor 
disk controller 

tere controller 


/*& TOMb 

/*% 20h 

/%& 401Mb 
sosmedil caracity disk 
MEGLUMN Carscity disk 
large caracity disk 


root file system 
swear file number of plocks 
usr file system disk tlocks 


disk/tsre disk huffer tliocks 


bhoatstrer blocks 


root file system disk 
swer file nmumber of tlocks 
usr file system disk tlocks 


gisk/taere disk buffer blocks 


hootstrer blocks 


root file system disk 
ewer file nmumber of hlocks 
usr file system disk thlocks 


disk/tare disk hurfer blocks 


hootstrer tlocks 


confisuretion 
establishing configuration 
established 


gisk tlocks 


hlocks 


blocks 


x/ 
¥/ 


x/ 
*/ 
*/ 


*/ 


xs 
x/ 
*/ 
x/ 


¥/ 
¥/ 
*/ 
*/ 
*/ 


*/ 
¥/ 
*/ 
K/ 
K/ 
x/ 


*/ 
¥/ 
*/ 
¥/ 
¥/ 


K/ 
*/ 
¥/ 
K/ 
#/ 


K/ 
x/ 
K/ 
K/ 
x / 


mot estshlishedk/ 


¥/ 
¥/ 


Xenix Driver Example (Cont'd) 


Source Listing 
define UNTITUOPENENR TRUE “/*% unit hes teen orened ok. K/ 
define UNIT CLOSER FALSE /* unit is mot arened */ 
#define BASEOWLOUWANTIR O“niG60 /# T/O srace HA bese ecddress K/ 
#define RMALSET Ox 4G /% THA single tute transfer */ 
tifdef SUN 
toiefine TMNALANDR RASELLULAINE + OxoOl /*% Vita sddress #7 
define IMALCNT RASEOWTOLANIR + 0200 /¥% word count K/ 
€#define TMALCMH BASEWITOLVARUR +. O09 /*R Commend K/ 
#define DMALSTS RASELTOLALTIR 4+ ° 020% /* status a 
tdefine TMALREQ BRASEW LOLA + ° O08 fR peauest Kf 
#define TMALMASK RASELWLOLATMR 4+ ° O20 /&% mask */ 
define IMAL MONE BRASELWLOLANIR 4+ OxOe /% made x / 
€define OUMALCKFF BASELWLOLVANIR 4+ ° Oxoqg fk clear nete K/ 
define DTMALTEMF RASEOTOLANUR + Onde /*% temroraere */ 
define TIMALMC BASE LW YOLATUIR + Oxo /*% master clear #/ 
€djefine TMALAMSK BASEWLTOLARIR + On0e /* all meek. ¥/ 
felce 
define TIMALATIR RASEWTULARIIR + 60x00 /*% TWA address */ 
€define UMALCNT RASE.W TOLALDR + Oxo “*% word count. a 
define NMALCMH RASEOWTOLANUR + 0x06 /*% command / 
#¥define TMALSTS BASE UWTOLATNR + ° O”06 /*®& status ad 
#define I[MALREQ BASE. TOLARUF + Oxnd09 /*% reauest 4/ 
define TIMALMASK BASEL LOLARIR + Ox08 /*% mask. */ 
tdefine DMA_MONE BASEL IOWA + Ox0n /* mode */ 
#define DMA CREF RASEOWLOLADIR + 020c /*E clesr pute Xf 
#define DIMA TEMP RASEOWLOLANOR + O»Od /% temrarery K/ 
define DMALMC BASELIOLANUR + ° OxOd /*& master clear */ 
#define TIMALAMSK RASE OT OLANNE + OxOT /& ell mask x / 
feandif 
kifdef SUN 
Fdefine TIMALEER BASEL TOLARTIIR + Ox22 /*% DMA raese res */ 
felee 
tdefine OMAK RBASEWTOLANUR + Ox 2S /%* THA erase res #/ 
fendif 
define OUMALIN 4 /*% DMA mode ~- deta in K/ 
¥define RMALOGUT 8 /% DMA mode —- date aut ¥/ 
#define TIMALCHNL MASK 4 /* channel mask nit x / 
#define DLP 0x20 /*% set extended write/normal timins 4/7 
/&¥ NCR S385 SCSI Controller Resgisters */ 
#ifdef SUN 
#define DAR RASEITOLALMR + Oxi /% date resisterk/ 
felse 
Fdefine TAR RASE UW LOLAMMIR + ° O10 /% date resgisterk*/ 
fendif 
tifdef SUN 
define CMR RASE_TOLAIUR + Ox10 /%¥% cmd res ¥/ 
felse 
define CHR RASELLTOLANDR + Oxii /%& omd res x / 
fendif 


Figure 2-l. 


Source Listing for Xenix Driver 


Example (Cont'd) 


Source Listing 2-4 


Source Listing 


tdefine 
#define 


#ifdef 
#define 
#else 
define 
fendif 


#¥define 
#define 
#define 


#ifdef 
#define 
#else 
define 
fendif 


*#ifdef 
#Fdefine 
#telse 
#tdefine 
fendif 


define 
tdefine 
#define 
#define 
#define 
¥define 
#define 


#ifdef 
define 
#else 
tHdefine 
fendif 


#ifdef 
#define 
telcse 
F¥define 
fendif 


#define 
#define 
define 
#define 
#define 
#define 
#define 


#ifdef 
#tdefine 
#else 
define 
fendif 


kdefine 
Figure 


2-5 Source 


CMRURYT 0x40 7% sinsle tute trensfer ¥/ 
CMR_IMA 0x80 /% IIMA mode */ 
SUN 

CTR BASE_TO_ANRUR + Oxis /*% contri reg ¥*/ 
CTR RASE_LOLARURK + Oxi2 /*% contrl reg ¥/ 
CTRUSEL 0x01 7% select enahle */ 
CTR_RES 0x02 /*% reselect enable */ 
CTRUFAR 0x04 /* rarity ensble ¥/ 
SUN 

Ik RASE_WITOUWADNR + 0x12 /*% gest Ill res ¥/ 
QT ke BASEUWLOLARUR + OxiS /*% dest I res ¥/ 
SUN 

ASR RASELLOUWAIUR + Oxi /*% eux stet res */ 
ASK BASE_LITOLAIMNR + Ox14 /*% sun stat res xK/ 
ASK..1CZ 0x02 /% transfer count zero x / 
ASRUFAU 0x04 /% essed ¥/ 
ASROI0 0x08 /* SCSI I/0 signal ¥/ 
ASR.CH 0x19 /% SCSI e/a signal ¥/ 
ASROUMSG 0x20 /%&% SCS1 mee signel ¥/ 
ASRUFE Ox 40 /%*% parity error K/ 
ASR ONAT 0x80 /%¥% Nate resister full *X/ 
SUN 

THR RASELLTOLARUR + 0x14 /% Tu resister */ 
Tuk BASE TOWANDR + OxdS /*¥% Ill resister ¥*/ 
SUN 

INK RASEUWLTOLARR + Oxi? /%¥% intr res x/ 
INK BASEL ICLANUIR + Oxtd /%k intr reg K/ 
INE..FC OxO1 /*% funetion comrlete x / 
INRUES 0x02 /*¥% gus service K/ 
INRONCN 0x04 /*% disconmectedg %/ 
INROSEL 0x08 /*% selected x / 
INK_LRES Ox10 /*®% reselected K/ 
INROIVC 0x40 7/* invalid commend */ 
INROURESEY Ox“8Q /* reset intr - driver genersted#/ 
SUN 

STR RASEWTOUWARDR + Oxdé /*¥ source Il res#/ 
ST RASEVWTOUWARIUR + Oxi 7 /%*% source IT res#/ 
STR LTNY Ox&O 7¥% IN valid ¥/ 


2-1. Source Listing for Xenix Driver Example (Cont'd) 


Listing 


ifdef 
define 
telcse 
tdefine 
tenagit 


tdefine 
define 
#define 


#ifdef 
define 
#felee 
define 
Ferndif 


Hifdef 
tdefine 
falce 
tdefine 
fenaif 


Fifdef 
define 
felse 
define 
fendif 


SUN 
NSK 


LISk 

NSkoOSUS 
nse NCS 
nSkoNC 


SUN 
TCRORG 


TCRBS 
SUN 
TCR OR2 
TCROR2 
SUN 
TCR ORI 


TCR 


BRASEWITOLAMNR + Ox18 


RASEWLOLANUR + Ox LY 


/* 


Source Listing 


gies stet resxk/ 


/*% diss stat resk/ 


OxGQ/ 7% self diesmostic ststus ¥/ 
Oxn3S /*®% Giasnostic command ststus ¥/ 
Ox8O0 /% Giasnostic comrlete *K/ 
RASEOWTOUARMR + Oxid /*% trans ctr MSERX/ 
RASELW TOU ANOR + Oxie /% trans ctr MSRK/ 
RASEWTOLWANLR + Oxde /* trans counterk/ 
RASELWIOUWANDR + Oxted /%®& trans counter*/ 
RASEUWLOUWARIR + Oxif /% trens ctr LSBX/ 
RASEULIOUVWARIR + Oxile /% trans ctr LSEBX/ 


/* Other Host Adarter Redisters xK/ 


#ifdef 
#tdefine 
#else 
Kdefine 
fendif 


#define 
#define 
#define 
#define 
#define 


#ifdef 
#define 
#telse 
#define 
fendif 


#tdefine 


#tifdef 


#define 
#felse 


define 
fendif 


/% NCR 


Figure 2-l. 


VSB 


SUN 
GSE 


GSK 

GSR_RST 
GSROREQ 
GSR.INT 
GUR_OFP TL 
GORUOFT2 


SUN 
GCK 


GCR 


GCRORST 


BASEL TOUWANIIR + OxeS /% stat resister*/ 
RASEWTOUCARUR + Ox2?4 /% stat resister*/ 
OxnO2 /%& SCSI tus reset flesg ¥/ 
0x04 /% SCSI reauest signal */ 
Ox3y 7% interrurt level select ¥/ 
0x40 7% ortion switch */ 
0x80 7/*% option switch ¥/ 


RASE TOLUBIUR + 0x21 


BASE..LOLAIDIR + 0x20 


0x01 /%* reset SCSI tu 


BASELLTOWANUR + OxR2S 


RASE_TOLAMDR + Ox27 


SCSI Controller command codes */ 


7% 


7% 


S 


/% 


/% 


command res X/ 


command red */ 


X/ 


release reset*/ 


release reset*/ 


Source Listing for Xenix Driver Example (Cont'd) 
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Source Listing 


#define ACLRST 0x00 /%& chir select ¥/ 
#define AC NCN 0x01 /%&% Gisconnect */ 
¥define ACUFAU 0x02 /% fause x/ 
#define ACLATN 0x03 /% set attention */ 
#define AC_MA 0x04 7% message accerted */ 
#define AC_CI 0x03 /% chir disahled ¥/ 
#define AC USWA 0x08 /%¥% select with attention ¥%/ 
#define AC SEL 0x09 /¥% select without sttention K/ 
#define AC_RES 0x02a /% reselect */ 
¥define ACLUDMT 0»O0n /% Giaesnostic dats turnaround ¥/ 
¥define ACLRC 0xOe /% receive commend ¥/ 
#define ACORN 0xOd /% receive data ¥/ 
#define AC LRM 0x0e /% receive message out ¥/ 
#define AC URI OxOFf /%& receive unsrecified info out */ 
#define AC.SS Ox10 /% send status ¥/ 
#define AC Sh Ox li /*% send date */ 
define ACUSM Ont? /% send message irs ¥/ 
#gefine AC LST 0x1 /% send unsrecified info in */ 
#define AC TI Ox14 /% transfer info x / 
#define ACUTE Ox S /% transfer rad ¥/ 
/*& Cless 0 Command Nefinitions */ 

#define OCLUREALY 0x00 /%& test unit ready *K/ 
#¥define OCLUREZERO OxOl /% disk rezero unit ¥/ 
#define OC_REWINE OxnOl /k tere - rewind x/ 
#define OC USENSE 0x03 7% request sense */ 
#define OCUFORMAT 0x04 /%& format unit X/ 
#¥define OCUWREASSTIGN 0x07 /% reassign tilock. ¥/ 
#define OCLREAR xO /*®% reac K/ 
#¥define OCUWRITE 0x08 /*® write ¥/ 
#define OCUSEER Ox“Ob /% seek ¥/ 
#dgefine OQCLUFM_UWRITE Ox19O /*¥% tare - write file mark. K/ 
define OC. INQUIRY Oxi? /* ineguiry ¥/ 
¥dgefine OCUSELECTUMOUE Onis /% mode select K/ 
¥define OCUWRESERVE Ox1s /% reserve unit ¥/ 
#define OCWRELEASE OxiZ 7% release unit ¥/ 
#define OC_COFY Oxi8 7% cory ¥/ 
#define OCLERASE Onl? /% erase x / 
#define OC. MODE. SENSE Oxle /®% mode sense ¥/ 
#define QCuLOAN Oxia /%& tare load/unload x / 
¥define OQOCLRECV_LUTAGS Oxnic /% receive diesgnostic ¥/ 
#define OQCUSEND_ULUTAG Oxnid /% send dissnostic */ 
#¥define QOCUOTERUG Ox fO 7% turn of f taedetus K/ 
#€define OCLWINERUG Oxt /% set nae_deous to i */ 
#¥define OCU2HERUG On F 2 /%*% set naidetud to 2 */ 
/& Class 1 Command Yefinitions  */ 

#define CMILGRE_I Ox2O /%& Sroure 1 command files 4/ 
#tdefine OQCUCAFACITY One e /% reed caraecity ¥/ 
#¥define OCUXREAN 0x28 /% extended read *K/ 
#define OCUWXAWRITE Ones /% axterded write */ 
define OCUWXASEERK Oxeh /% extended seek x/ 
¥define OCUVERTFY Ox2T /% verify ¥/ 
/%# SCST Comeletion Status Bit Definitions */ 

Figure 2-1. Source Listing for Xenix Driver Example (Cont'd) 
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Listing 


#define 
#define 
#define 
¥#¥dgefine 
#define 


/*¥ SCSI 


define 
#define 
define 
define 
#define 
define 
#define 
#define 
#define 
#define 
#tdefine 
#define 


f/*ttdefine MSG ITM 


fdefine IQ WTIMEOU! 


CS.PE 

CSLERR 
CSORSY 
CS.ICS 
CS_REC 


0x01 
0x02 
0x08 
Ox19 
Ox 20 


KR Parity 
/* error comdgition 
/*¥% tarset oguey 


/¥*% intermediste comrletian stat 


error 


/%*% recoversole error 


Messsade Kute Nefinitions */ 


MSG_CMF 
MSG_USDF 
MSG_LICN 
MSG_LART 
MSGUREJ 
MSG_UNOF 
MSG_UMPE 
MSGULCC 
MSG_LCF 
MSG_URST 
MSG_IN 

MSGR 


0x00 
On“O2 
0x04 
0x06 
Ox“? 
0x08 
OxOY% 
Onda 
OxOn 
One 
Oxo 
Ox8O 


Oxf ld 


/® commend comrlete 
/%®% seve dete rointer 


/¥*% ciscannmect 
/*® short 


/*% messase resect 
/*% no oreratian 
/*% messese rerity error 


/% Linked commana 
/X% linked cmd comrlete witn 


/¥% ous device reset 
/*% igentify messecge 


“/*% identify 


OxcO 


Source 


complete 


With gGiscannmect 


flash? 


Listing 


*./ 


x / 
¢ 


/* igentify with siscornmect 


“¥% Y/0 command timeout 


A/¥RAKK Tlisk I/0 Error Codes ®#**KK/ 


#define 
define 
define 
define 
#define 
#define 
#define 
#define 
define 
#define 
#define 
#define 
define 
#define 
#define 
#define 
define 
#define 
#define 


EC. NORMAL 

EC RAn_CMM 
ECL ANIIR MK 
EC_LREC_NE 

EC RALLRST 
EC_DMA_ RENT 
ECL RATLTRK 
ECL RAN_LECC 
ECLDATOREC 
EC_LCNTLER 


ECUSEERK 


EC. TIMEOUT 
ECLPARTTY 
ECUCHK CN)! 


EC_LRUSY 


ECU RUS_RST 


EC_SCSI 


ECL ADAPTER 
EC_SEL_TO 


0x00 
0x01 
0x02 
0x04 
0xO% 
0x09 
0x0 

x10 
Oxi 
OxZO 
0x40 
0x80 
Oxi 
0x82 
0x83 
0x84 
Ox“Ss 
0x86 
0x87 


SEXKKKAKKKRKKKRARKKAKKK Nish / 
/% Class O Sense Codes */ 


#define 
define 
#define 
#define 
define 
#define 
#define 
#define 
#define 
#define 
#define 


ELM!UNOSENSE. 
EDNOINDEX 
EN_NOSEEK 
EDUWFAULT 
EN_NOTREARY 
ED_NOTSELECTED 
ED NOTRKO 
ENUMULTIUSEL 
ENUNOTLOANET 
ED INSUFCAP 


ENnNTO 
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0x00 
0x01 
0x02 
0x03 
0x04 
OxO% 
0x06 
0x07 
0OxO0Y 
0x08 
0x0 


/*¥ normal commend comrletion 
/& tad command from 
/% address mark not found 
/*% record nat found 
/% reset failed 

/& attemet to TMA over 64K toundk/ 


/% nad track. 
/*% ECC error or 


reasd 


celler 


/* corrected dates error 
/*% conmtroller error 


/% seek error 


/% timeout error 
/& rarity error 

7% check candition 
/% target busy 

/%&% gus reset occurred 
/*% SCSI interface error 
/% nost aderter error 


7/*% selection 


Yeree Error Codes 


Limeout 


¥/ 


KXKKKRKKKKKKAKE KEK / 


mo sense 
mo index 
no seek. comrlete 
write fault 
grive not ready 
gqrive not selected 
mo trecr. 
multirle drives selected 
medise not loaded 
insufficient caracity 
tare - drive timeout 
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signal 


-~eTo 


¥/ 
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/%*% Class 1 Sense Codes */ 


#define 
#define 
#define 
#define 
tdefine 
#define 
#define 
#define 
define 
define 
#define 


ENLUTUREANERR 
EN_LULDATAERR 
EN_ INARI 
ENUWDATAAHILUR 
EnUNORLOCK 
ENJSEERERR 
EN_UDNMATO 
EN_LWRTFROT 
EN UCRATACHK 
EROWRADIIRLK 
EQLINTERER 


/k¥define EDLFMVETECT 


fdefine 
¥define 
#define 
#define 


/% Cless 


#define 
define 
#define 
#define 


#define 
#define 
define 
#define 
define 
define 
#define 
#define 
#define 
fdefine 
#define 
#define 
#define 
#define 
¥define 
define 


PRK 


#ifdef 
struct 


ENLCMIILATE 
ENUTATLATE 
En_UWCHKERR 
ENLECC 


Ox10 
Oxi 
Oxi2 
Oxls 
Oxi 4 
Oxls 
Ox16 
0x17 
OxiS 
Oxy 
Oxile 
x1ic 
Oxle 
Oxnid 
Oxie 
Oxif 


2 Sense Codes */ 


EXLINVCMD 0x20 
ENLTLIELKALNE Ox7Zt 
ELLUNITATT 0x30 
ENUWCMITO Ox3l 

/*% Extended Sense Error Codes */ 
EXO NOUSENSE 0x00 
EX REC ERROR OxOl 
EX NOTOUREADY 0x02 
EX MEDIA. ERROR O03 
EX HARTIIWAREWERR 0x04 
EX ILLGAL.OREQ Ox ON 
EXWUNTITLOATT 0x06 
EX.LATALFROTECT O07 
EXOWLRES 0x08 
EXWVENTIOR.WUNIQ OxO0% 
EX.COPY ARORTED OxO0e 
EX ABORTERUCMI OxOm 
EXU2RES 0OxOe 
EX.VOLOVEL OxOd 
EX MISCOMPARE 0x0e 
EX SRES 0OxOf 
river Structures XKXK¥/ 
SUN 
snaortuolk < 7% 
UCHARF Lumwlnaes /% 
UCHAKE omic 9 /% 
UCHAK Lnsds /% 
UCHAR losis /% 
UCHAR flesgilinks /%. 
UCHAR numolkss 7% 


Figure 2-l. 
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Il! resd error 

Uncorrectathle dsetea error 

Itt address mark mot found 
date eddress mark not found 
block mot found 
seek error 

IMA timeout error 
Write rFrratect 
correctashle date 
hed olock found 
imterlesve error 
tere - file mark detected 
command late error 

date late error 

Write check error 

ECC soft error 


check. 


invelidg command 
illegal tlack seddress 
unit attention 
commands timeout 


ro sense key informetion 
recoversole error 
LUN not ready 

media error 

hardware error 
illegal reauest 

umit ettention 

dete rrotect 
reserved 

VeENGdor widaue 

COFY saorted 

shorted command 
reserved 

volume overflow 
miscomraere om verify 
reserved 


6-noxte conmand clock */ 
LUN + MSR losgicsl tlock addr ¥/ 


Commands 


MSE logicel tilock. 


logicel 


S$rour/code Ly 
S44 TESS 


Fs 
clock eddress */ 


flees + link fields cf 


Piss Oe i 


of nlocks 
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struct lons.olk + /*¥& LO-bete command tlack. */ 
UCHAR Lugs /¥*®% logical unit resmbher ¥/ 
UCHAR cms /% command srour/code K/ 
int olhosddrs /® logicel nlock address *K/ 
UCHAR mSso num olks» /% MSE rumher of olocks ¥/ 
UCHAR nmowuseds /* not used */ 
UCHAR fleswlinks /*% flags + link fields ¥/ 
UCHAR Lsounumwolkss 7% LSE number of nlocks *X/ 
+3 
tFtelee 
struct snortilolk < /% 6G-hyte command olock X/ 
UCHAR Cmca y /*® command grour/code */ 
UCHAR Lunmwloas2s /& LUN + MSE logical block addr ¥/ 
UCHAR losis /% logical tnlock address *%/ 
UCHAR Lnads /® MSB laosical plock sddress x/ 
UCHAR rumiwolkss /*% rumner af nlocks ¥/ 
UCHAR fles links /% fles + link fields x/ 
a) 
struct longublk < /*®% 1O-byete command nlock */ 
UCHAR Cm y /% command sgrour/code x / 
UCHAR Lurs /*® Llosical unit rmumber */ 
int nlkoaddrs /% logical plock address x / 
UCHAR rmowuseds /% not used x/ 
UCHAR msounumolkhss /%*% MSR number of thlocks *X/ 
UCHAR istunumolkss» /*& LSE numoer of tlocks X/ 
UCHAR lflesulinks /% flag + link fields X/ 
+3 
tendif 
struct sioch ¢ /*% & & 10-bhete command bik sherex/ 
union < /*& same sllocstion storege */ 
struct shortublk sb /% short tlock ¥/ 
struct lonmsubik lbs /*% longs tlock %/ 
snort ssouflMAX.IOCB.SZ15/*% treat es short buf x/ 
+ Cours 
+5 
struct dkuinf < 
int gkhur-resents 
int Gkoonlkoisizes 
+9 
struct size ¢ /%& disk rartitions */ 
long mholockss 7/¥% blocks rer partition */ 
longs blockoff s /%& block offset */ 
+ He sizesCCNTLR..UNITSICDNISK_UNITSICFSI = <¢ 
S.BLKS_ROOVs O- /% root ~- file system O ¥/ 
S.BLKSUSWAPs O» /% swar file ¥/ 
S.RLKS_USR: Os /% usr - file system i x/ 
S.RLKASUFASTs O» /% Gisk/tere disk thuffer x/ 
S.BLKS ROOT, O /%& pootstrsr pnlocks ¥/ 
+9 
struct sioctl < 
struct sicoch iochs 7% command tlock. */ 
#ifdef SUN 
UCHAR atetuss /% stsetus heute */ 
UCHAR msgs /%& messsase nute ¥/ 


Figure 2-l. 
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#else 


fendif 


+3 


struct 


+3 


etLruct 


+9 


struct su sense ¢ 


+5 


SsLruct 


+9 


stLruct sumsense 


UCHAR 
UCHAR 


int 
cher 


mses 
statuss 


Hcourst s 
Koufwsddrs 


Su.caerscity ¢t 


lone 
longs 


lestuwnlkisddrs 
thlockosizes 


S.inaguiry wv 


UCHAK 
UCHAR 
UCHAR 
UCHAK 


UCHAR 
UCHAR 
UCHAK 
UCHAK 


“~sense t 


UCHAR 
UCHAR 
UCHAK 
UCHAR 
UCHAR 
UCHAR 
UCHAK 
UCHAR 
UCHAR 
UCHAK 
UCHAR 


UCHAR 
UCHAR 
UCHAR 
UCHAR 
UCHAR 
UCHAR 
UCHAF 
UCHAR 
mt 


Figure 2-l. 


GeVILYE 5 


/% message nete 
/% status nvte 


/%¥% tyete size of transfer 
/% Gata huffer rointer 


devityvrwlauslifiers 


revilevel 3 
eltcieyvlsy; 


class codes 
mstunlkiwiaddrs 
sbhlk.iaddrs 
lsthublhiaddrs 


Vedas 

SES mas 
sensewkews 
QAMSOw2 s 
OMSCr Ls 
olsow2s 
tlesoowts 
addlolstns 
ercliercds 
TeC_MSHwErrss 
recllsnlerrss 


< 

mSizes 

WE mtu § 
OUP mosey 
comstss 
Sensitys 
rumilolke» 
rum2hlkss 
rum sblkss 
olkosizes 
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/%& extended sense info 


/*% for mode sense 
/%*% size - OxOc 


¥/ 
¥/ 


*/ 
¥/ 


*/ 


¥/ 
¥/ 


/& write rrotéimdedis tyrk/ 


7% nuffered modes srd 
7% slweys 0x08 

/%& density code 
/% totel tlks on 
/% totel olks on 
/®& total olks on 


/% always Si2 


Lare 
Lare 
Lere 


K/ 
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struct refs t 


union + 
ener courlL SZ CHARS Is 
shart stuT lL SZuSHORTS 2s 
longs Lhur lL S2 INTSIs 


struct Gicerecity ss_cerscitys 
struct GLlinauires ssvimauirys 
struct ¢isense ssisenses 
struct Sumsense Se imsenses 
struct x“uosense extsenses 
+ Tours 
+9 


struct timerwinfo 4 
UCHAK hetmos 
UCHAR hetflaess 
+ he tinfos 


/% Teredefs */ 
tyuredef struct sioctl sicoctlts 
tyredef struct siach siochts 


tyredef struct refs refsits 


AEXKKKK Llriver Global varishles KKKK*K/ 


Ssioch.t Kiochys /% The command block. X/ 
sioctl_t Kiiochs /& The ioctl commands oloct. 
refs.t Xdate_refss /*% charsshortyint references 
Sioch._t *Kiochs /& The command tloctk. */ 
sioctl.t Kiiochs /%& The ioctl command bloc. 
refs.t Xdaete_refss /& charsyshortsint references 


£ifndef SUN 

siocht moiochs 
Sioctl_t moiiochs 
refs_t m.date_refss 


Fendif 

ener ha_torenfCTAPELUNTTS Is 7% oren flags for tere */ 
char ha~tflasgsCTAPE_UNITS; /% special tare flags */ 
cher ha_treresCTAPE UNITS Is /% present tare units */ 
cher ha_unittyresCHALUNTTSI> /% device tyres */ 
cher hainited = INIT_NO, 7k initialized fles */ 
char timer valid = O» 7k interrurt timins flasx/ 
cher mMSSir..Ouf ys /% message in cell x/ 
cher mSSsoutoout y 7% message out cell K/ 
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¥/ 


K/ 


¥/ 
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char sts_huf ys /% status cell ¥/ 
cher stste_flsads /% ehsse stste ¥/ 
int stetuss /%& status word ¥/ 
short sem ioctl = SEM_FREE> /% ioctl semarhore */ 
UCHAR Lloctli_statusy,s /% ioctl status tete ¥/ 
UCHAR ioctl_msss /*% ioctl mss nete ¥/ 
#ifdef hERUG 

cner he.denug = O53 /% detus only ¥/ 
ftendif 

cner he force = O03 /% debug anle ¥/ 


#ifndef STANDALONE 


struct auf hetebs /% queue hesd X/ 
struct thuf rhabius? 5 /% for raw 1/0 ¥/ 
struct pnuf Hanus > /¥% for griver issued I/0*/ 
fendif 


struct dkhoinf dkoinfoCCNTLe. UNTYSILOISK. UNITS» 


caddr_t addrousseves /% split 1/0 address séevek/ 
/¥short dummyx COxifeds /*k*/ 


c*% 
JGR Softwere Services J. Ge. Retets 7/10/84 
SCSI disk/tare driver - me.ec & heen 
levelored for Emulex Corrorstion 

¥%/ 


*#include *../n/raramen* 
#include *../h/systm.n' 
#include *../n/nuf nn" 


#include ee/n/Giren" 
#include “../nh/user.h* 
#ifdef SUN 

#include “../h/damae.n" 

#elcse | 

define TMALAIMIRGs) (x) 
#endgif 


#include “ha.nh* 


extern na _strstesy()s 
extern ha timer) s 


mneoren(deyvsfles) 
gaevit devs 
imt flaeds 
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refst «drs 


int 


scsii_dev 


islumsecsiidevsstss 


= (minori(dev)  2= TAFE) ? (tscsidevidev) |: TAFE) ? 
scsidevideyv)s 


lum = sesilunmfdeyv) s 
if€(hecinited == INIT NONE) &% 
i(dkuinfolsesi_dev % MASK .UNITI lund. dkcreresent)) + 


> 


if (minor(dev) 


} 4 


Ueuuerror = ENXITUs; 
returns 


z= TARE) < 
/*lun = sesiluntldev)s /k*/ 
/X¥scsiideyv = tscsidevidev) | TAPE: /**/ 
gdp = dete_refss 
ifGlunm >= TAFELUNITS $1: nactorenfllund) < 
WUelierror = ENXIO; 
returris 
> 
if (ha_command(scsi_devs lumsOC_UREARY » 
SZ_REFLYsdate_rets)) < 
erintfC*HA? cartridge tere unit is mot readeu\ni")s 
hecommand(sesi_devslun»sOC_SENSE»sSZ_UREPLYsdate_refs) 5 
Ueuierror = ENXTOs 
returns 
> 
/*thacommand(scesiideyvs lum,sOC_SENSE»SZ REPLY sdate refs) 5 /KK/ 
ns _command(sesi_devslunsOC_LOADsSZ_REFLYsdate_refs) 3 


‘ha_command(scsi_devs lunsOC_LREWINDsSZ_REPLYsdate_refs) 5 


natorenfllun) = YRUES 
Usulerror = O03 


maclose(devsflagd) 


devit devs 
int flags; 
£ 


imt scesi_devylunis 


if(minor(dey) >= TARE) ¢< 


+ 


hastratesy (hr ) 
struct tuff Khes 


lun = scesilun (dev) > 
scsi_dev = tscsidevidev) ! TAPE: 


he torenfClund = FALSEs 

if(nha_tflagstlun) & TFOWRITTEN) ¢< 
he command (scesi_devslunsOC_FM.WRITE»SZ_REFLY»date_reftfs) 3 
he_tflagstllund = 03 

> 

he command(scsi_devs lumnsOCLREWIND»s SZ_REPLY»dates_refs) 3 

ha _command(sesi_dev, lunysOC_LOADsSZ_REPLY »date_refs) s 
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< 


#ifderf 


fendif 


Figure 2-l. 


int wx = Oxcells 

struct buf Kdeys 

imt wmits 

int vwneisgned x» szs 

lons laddrs 

imt is 

int 2z = Oxecti2s 

iffmnacinited != INITUYES) 
hainitdds 

iffdbe-Ghoflags & BLFHYS) < 


/%& determine configuration */ 


SUN 
maralloc(pr) 5 
> 
unit = minordpr-Pobodev) & MASK..UNILTs /*&% file system */ 
$2 = bre-Phlresid = tre-Phubcounts 
if(minor(be-Shboidev) < TAPE) < /& Gisk orersetion ¥/ 


((s2tRMASK) >> BSHIFYT) * dk_infolscsidev (hr-lhodev) I 
Cecsilun(he-sb_i dev) I] .dk_blkhesizes 

if @halinited == INITUUONE) 2% (Core-Shbblknots2 > 

he sizeslscsidev(hr--h_ dev) ILsesilun(he-vhdev) I 
Cumitd.nmihlocks) {3 

(ha_sizeslscsidevibr->b_idev) Iiscsilundhe-Shodev) I 
LFS_LUSRI.blockoff == 0))) < 

feeSnofleags i= BLERRORs; 

iodone (br) 5 

returns 


S22 = 


> 

OFF SvUFOrw 

trees hlerror 

x = SPELO)s 

de = hatebs 

if (dre-Sholactf == 
Sre-ohblsct? = 


NULL 5 
Os 


NULL) 
tr 5 
else 

Gr-sbhiwacti-sevuforw = tes 
Gee-scnwsetl = bes 
if(dre-Shlective == NULL) 

hestert() 3 

/& its 2a tare oreration K/ 


code nere */ 


+} else < 
/% add tare 


bee-Saevoiforw = NULL s 
oeeSb flags t= BUTARES 
tree-shlerror = Oy 
x = SFLO)s 
de = hates 
ifddreeSbhlset? == NULL) 
Gre-eholaectf = prs 
else 
Gree-spwseti-saviforw = ors 
Greesholaetl = brs 


if(dp-shoactive == NULL) 
nmastartié)s 


> 


Sp le ds.) 5 
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£ 

int “wu = Oxddiis 

struct puf Fors 

siocbit Ksioch = iochy 

int winits szs 

daddroit tory 

imt sesiideavs 

int Lare.or = FALSEs 

imt Gh mad s 

int zz = Oxddi2s 

if(the = fhatet.tFouactfT) == NULL) + /& nothing to doa ¥/ 
returns 

} 

addroisseve = O03 

hateh.,niactivetts /*% sctivete it */ 

unit = minordhe-Sb_idev) & MASK UUNITs /% File system ¥/ 

$2 = fhre-Phobcounts 

Si.mod = dhoinfolsesidev(br- sbi dev) Ifscsilunt(be-tbi dev) I.dklilkuisizes 

if(minordbe-Shbodev) =< TARE) < 
bn = be Sblbiknotdkh.mods 
iftbe '= fhabut) 

hno=ponithe_sizes(scsidevibr->h_dev) Iiscesiluntthe-sb dev) jbo 
scsi.dev = scsidev(hr-th_ dev) 3s 
sz = ((sz + BMASK) >> BSHIFT) * dkhkumods 

+ else < 
tare_lor = TRUES 
scsi.ideyv = tscsideviunit) s 
tm = O¢3 
sz = ((sz + BMASK) >> BSHIFT) ¥€ 235 

+ 

unit = sesiluntar-Shideyv) 5 /* driver riugmber X/ 

/% setur the ioch ¥/ 

ha_clesr_iochnlsiach) s 

ifffore $= Rhabuf) <¢ 
be-Shoeyvylin = Che-Sboflegs & BREAN) ? OCLREAR + OC_WRITEs 

> 

if@on <= MAX.SR) < 7% build 6-byeyte ioch ¥/ 
sioch<-Sclun.sbh.cmd = br-Pa_cylins 
if(tarelor %$& (Cbre-Sbucvlin == OCLREAN {i 

beeoholcylin == OCLWRITE) ) 

sioch<-Se_unm.sbelun.lbsa2 = 135 
else 

Sioch—-Yc_un shelum.ilha2 = 0 : Cunit << SHIFTULUN) 

+ (firm &> 16) & Omit), 

sioch-sc_un.sh.lbal (Com >> 8) & MASK_BYTE)» 
Ssioch-Sc_un.sh.lbad = Chm & MASKUBYTE)s 
sloch-scuun. sh mnumiblks = szs 
if(tsere.or &% Chre-Sbleyvlin == OCLWRITE)) 

ha_tflaedsCunit] = TFUWRITTEN:; 

+ else ¢< /% tuild LO-bete ioct ¥/ 
siocch-sclunelb.cemd = fr-Fhboucylin | CCOMN_GRF_1)s 
Ssioch<--eclumieibelunm = units 

£ifdef SUN 


SWAP_LRINT Cin) » 


Figure 2-1. Source Listing 


for Xenix Driver Example (Cont'd) 


Source Listing 2-16 


Source Listing 


fendif 
Sioch—- Scum lheblkiaddr = brs 
sloch<-Sclumeliomsbunumwbplks = (sa %> 
sioch<-sclun lo.,lsbunumblks = 
> 
iffbre == hsebuf) 
Ne srecialwcmdis(tsre_orsbe-Sh_oceylin); 
he sendgiscsi_cmdadlberssiochsscsi_deyv) 3 
> 


*£ifdef SUN 
nmaintrd) 
felse 
neintrilevel) 
fendif 


< 


struct buf brs 
sioch.t *Ksiochs 


#ifdef SUN 


fendif 
int shes 
int intufleass 
int bhufladdrs 
int ismssdess _flaessaoriseves 
imt error = QO; 
cher 3 
/% 
ifthactdebug == 1) < 
Printfl*haintr: level = Ax bP PEE ee ble RD 
Setied)y 
> 
*/ 


int level = INI_LNORM LEVEL» 


t4ifdef SUN 
ifithae_tinfo he tflaes == TIMER. RUNNING) 22% Cheutinfo.hatma 


level = INT_TMO_LLEVELs 


fendgif 


hatinfohac_tmoa = O% 
bre = hetsebd.toactfs 
if@dbr == (struct tut *KINULL) 
sioch = (siactwt K)te-shresids 
else ) 
ifior-boofless & BLIOCTL) 
sioch = (siochit Kyijiachs 
else 
sioch = iochs 
gsr_save = intfles = inhC GSR) s 
iffint-fles %2 1) rrintfc'l/O NMA timeout\n' ds 
if@level == INT_UNORW.LEVEL) + 
ifdintufles %& GSRRST) <¢ 


mauwoerue_loorion( GSR» GSR_RST ) s 


status = EC_LRUS_LRSTs 


ha setistete fles(SFOABT»s TRUE) 5 


if(haclinited == INIT_YES) 
ine delsyCINIT_NELAY)s 
for(she=O0ssher1000;sthctt) 


ifGinhdDNSR) == NSRONC) 


breaks 


& MASK.BRYTEs 
$2 % MASK_RYTEs 
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ifCinkONSR) t= DSR) 
ststus = EC_LANAPTER: 
ouUtLDCOTROCTROPAR § CTRIRES): /% enable rarity & reselect 
imtu.fles = INR.RESET> 
+ else tv 
she = inh CASK) s 
iffsihe &% ASRIFE) < 
ifi(sbe == ASRLUPE) 33 
({ha_sgetustateflaeg()) & SF.I0)) 4 
status = ECLFARITYs 
hesetuistaete_flags(SFLARTs TRUE) s 
mssoutuhuf = MSGLARTs 
> 
ey 
imtuflesg = inbdINk); 
} 
Switch Cintufles) <x 
cease INKS? 
if(idssrisave & 4)) 
hau ufslse.loor won(GSk,GSROUREQ) s 
s.flad = ha_sgetu_stste flag()3/%* rehonw int P */ 
ifiis._flag & SFLCMP) {3 (sifles & SF_DCN)) < 
OuUthICMReACLTF | CMRUBYT)s 
returns /% wait for disconmect */ 
+ 
she = {(shbe >: SHIFTUPHASES) & MASKOUPHASES: 
Switch (she) <{ 
case PH.OUT_ULATAS 
case PH UIN_NATA?S 
he_dete_rhasel(sbheshe- fbn boaddrsthre-Sb_pcount) » 
ARM TIMER GTMOLINT) » 
returns 
cease PH. COMMAND 
he cma rhase (hr-cho resid) 5 
ARM. TIMER CTMOUWINT) 5 
returry 
cese PH STATUS? 
sts_huf = haeistetusu_rhese()s 
if(br-Sb_fledgs & RU-IQCTL) /* save status */ 
joctlustetus = sts buffs 
ARM TIMER CTMOLINT) 5 
returns 


cease FHUIN. MSG? 
msdinbuf = msg = haclirnmssurhase()5 
if€bre->boflsesgs &@ BUIUCTL) 
ioctl_mss = mses 
heai_setuistate flag (SF_CMPs TRUE) 5 
ARM TIMERCTHOLINT) > 
returns 
case FH.OUTUMNSG? 
ha _cutmss_rhasel(mssoutubhut ) 3 
ARM. TIMERCTMOLWINT)s 
returns 
case FH. BARI? 
case FHORANZS 
heiheduirhase(she) 5 
bresks 
> /%& end she case */ 
breaks 
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case INR DUNS 
$¢.fles = he_getstste_flest)s 
iffs_fles & SFUNCN) < 
Rid. TIMER CTMOLINT) 3 


returns /%4% wait for interrupt K/ 
+ else 
if(siflses & SF_USEL) < 
ststus = ECLSELUTOs /**/ 
} 
heset_stste_flasi(*SFUCMP ey FALSE) 5 
bresks 


csse INK.FC? /*K Function Comrlete Interrurt */ 

ifithatdet state _flagi)) %& SF_MSGI) 
he evalumssin((bhe-Shbdey +> SHIFTUUNIT) 
% MASK_LUNIT) » 

ARM..VIKERCTHOLWINT) 5 
returns 

ease INR RES? /* Reselection Interrurt ¥/ 
i= fhecstate_fles(*SF_NCN»s FALSE) s 
ARM. TIMER CTMOLWINGT > 5 
returns 

case INK.IVC? /* Invalid Command Interrurt ¥/ 
hea_reset()s 
status = ECLARGFTERs 


bresks 
case INR_LRESET? /* Reset Interrurt x / 
ARM TIMER CTHOLINT) 5 
returrsy 
} 
+ else 
ifGlevel == INTLYTMOLLEVEL) < /% driver timeout cell */ 
stsituf = TOL TIMEOUTS 
PrinmttTi°HA? command timeout\mn*)s 
} 
if((sioch-sc_lun.sh.emd == OCULUSENSE) 28 Cie == NULLD) £ 
returns /X readings sense info directly - not thru buffs «/ 
} 
iffeddrisave f= 0) VT /% Ffrasmented 1/70 *K/ 


beeSbuurnetiueddr = aeddroseves 
eagriseve = O35 


> 
ifidets_buf f= 0) {i Cstatus f= O0)) LC 
bee lriflaeds t= BLERRUOR; /*& fles error condition */ 
ifitbr-Shlerrortt < MAX.ERRORS) &% 
Clipee-Sofleds & BL.IOCTLI)) £¢ 
hastaerti), /k restart the feilins 1/0 7. 
returns 
} 
} 
ifiitbhe-Shlerror Y= 
Clifpe- >ihiflaegs & 
error = TRU 


HAX ERRORS) && Charinited == INITUMONE) &% 
R.LTQCTLI))) £ 
Es 


bara 
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hHeteh.huerrenmt = Oy 

hatab.bvsetive = NULL: 

hatah. fwsctT = hre-Ssviforws /* Gdecuevue comrileted reauest x 
if(idheerib_flags & BLERRUR) ff /K mo errar or recavered */ 


(lbre-Snuflegs & BLERROR) &2 (br-Sblerrar < MAAZLWERRORS I) 4 
if(be-tiwfless & BLERROR) 
be-Fhoflags &= “BLERROR: /* recovered from errark/ 


Dees pesid = QO; 
be-Shlerror = 3 

+ else I 
tee -bouresid = hbhr-snm heoumts 
De-Sohlerror = sts_ihutys 
bees flegs j= BLERRORS 


} 
ifibe-Sbo flags & BLERROR) < 
ift(hacerrwhandlertbr- Sh devests buf sstatus) ) 
deverrordlbessioch-rc_un. sh. emdgssts tur & MASKURTTE) » 
else <t /K mot really sen error ¥*/ 
bee Shboresid = O+ 
be-Shlerror = O03 
be-Si flags = *BLERROR: 
+ 
hauwreseti)s la © Fi 
> 
Lodone (ine) 5 
hastertl)s 
+ 


mainitd) 
< 


int yy = Onaaeils 
refs.it Kedps 

int isxsunits lursstss 
char C5 

int z2zo= Oxeael2s 


if@hewinited == INITONONE) returns 
PrintfiftEnter “1’ to enahle dehus mode *); 
ec = getchard); 
iffe == ee’) tI hae_inited = I 
iffe != ‘\n’) tha-dehus = c & 
hawcinited = INIT_YES: 
status = msgoutwbuf = mssginhuf = 0; 
#ifdef SUN 
if(@(Cioch = (siocht Kimultimem(sizeofisioch_t))) == NULL) f3 
(Ciioeh = (siocti_t K)multimem(sizeofisioctl_t))) == NULL) [3 
((data_rets = Crefsi.t Romultimem(sizeoflrefs_t))) == NULL)) WL 
Printf(*HA? Unehle to allocate MULTIBRUS memore\n")s 


NITUYESs returns} 
OnOFS 


returns 
> 
felse 
ioch = &muiochy 
iioch = &moviiochs 
gdata_refs = tmuidatea_refss 
fendif 


/* initislize the bloody INTEL 8237 DMA chir K/ 

ge = date_retss 

OUtHCIMA_MAC sO) 5 /* master clear the ThA channel */ 
OUtToECIMALCMDNs DUP TL) 5 /%* set extended write/normal timins 7 
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x = SELO) 5 
ha_reset ()s5 
Ssrixds) 5 
ha.delaevyii100)s5 


for CunmitHOsunit<2sunittt+) { /%& for test only *€/ 
for(lun=Osluneisluntt) I /* for test only */ 
sts = hecommand units lumsOCLREANY »sSZ_UREPLYsdgatalrets) s 
if€ets == 0) i 
hacunituteresCunityd = IN TISNs /* force it -— KILURGE */ 
gGkooinfoCunmitjClund.dkhurresemt = 1s 
if(ists == O) 2% Gunit = 139) xX 
if ( Cha_command (units lumysOCUCAPACITY» 
SZ_REPLYsdate_rets)) == 0) X 
NewtHloinitdunits lus 
SWAPLURINT (dr- run. ssicerscity.lastuwblkiaddr) » 
SWAP LUBINT(de->roun. ss_carscity flockousize) j3 
> 
} 


} 
} 
he winited = INIT DONE, 
Ueuerror = O% 
hetinfo.hea_tmo = TIMERLRESETS 
timeoutihsu timers, THOLINT > 35 /& srm interrurt timer ¥€/ 
he tinfo ha_tflesg = TIMER RUNNINGS 
hatinfo ha_tma = TMOLINTs 
} 


naresdidev) 
devit devs 
£ 
tifdef SUN 
Phesiolhestratesys arhehbuts devs BUREAT)s 


felse 
ehusiol&thastratesys arhahul,s devs BUREADR) » 
fendgift 
¥ 
mawriteldev) 
devit devs 
af 


tifdef SUN 

Phyusiatchsstratesy, &rhabutfs devs BROWRITE) » 
#felse 

rheusioléhastretesgys &rhahuts dev» BLWRITE)» 
fendif 
} 


Neioctlidevscommands addrysflad) 
devit devs 
int commands 
caddrit sddrs 
int fless 
< 
sioch.t ##siocths 
siocti.t Keioctls 
imt 3 
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2-21 Source Listing 


Source Listing 


iftisuseréd)) < 
erintfOtHGs must be sureruser\mn’)s 
Usuerror = EFERMSs 
+ 
ifthactinited != INIT_YES) 
hainmitdds /* determine confisguration K/ 
ifttcommand %& MASK.RYTE) == OCLONERUG) tL 
he debug = command & MASK.DERUGS, 
returns 
} 
x = SPLODs5 
While(semuwioctl) 
sleer(icaddr_t)semuioctl» FRIBIO) » 
sem ioctl = SEM.RUSY, 
Srlsisedy 
Sioctl = iliochy; 
haclear_ioch(sioctl)s 
iffcoryvintladdrssioctlysizeafisioctiit))) ¢ 
Ueierror = ERFAULTs 


+ 
iffueucerror != G) 4 
sem ioctl = SEMUFREEs 
wekeurlicaddritisemuvioctl)» 
returrs 
> 
/% need to lock user rrocess in memory by calling ehyusio */ 
Uelcaount = sioctl-Sheounts 


Ueuoffset = 0% 
Weuhbease = (caddrit)sioctl-rhufuwsddrs 
rhatuf.oO.resid = Cunmsisned) sddrs 
#ifdef SUN 
eheusialhatstratesy,s &rhsbutfsdevsKR_REAM) 3 
#else 
ehesiolzha_stratesus grhabufsdevsB_REAN) s 
#endit 
if(sem_ioctl) { 
semiioctl = SEM_FREES 
wekeur ((caddritisemiioctl ) 3 
> 
/% this call places the status 2 mse st &sioctl+MAX_BYTES_IOCR ¥*/ 
#ifdef SUN 
sushort Caddr+MAX_RYTES_IOCKHs Cioctlomss | 
Cioctlustatus i< SHIFTUBYTE)))3 


#folse 
suwordladdr+MAX_BRYTES_IOCR» Cioctl_mse |} 
Cioctl_estatus << SHIFTUBYTE)))3 
fendif 
> 


nawtoloinitdunitslunsblkeomaxsbhlk.size) 

imt wnmitsluns 

longs tbik_maxshlkusizes 

< 
imt i,dkusz2dk.modsydk.iitlkisizes 
long szydkuoicarecitys 
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dkubik.isize = Cintbikusizes 


/*Adkmod = (dkiblkusize == S512) F SZS12 3 SZ10245 /R*K/ 


dhomodg = RSIZE / Gkutlkusizes 
aghoinfolunmitiClund.dk ilk size 
ifidkumod == SZS12) 
Gkhocarscity = Cbik.max 
else 
dkhocaeraecity: = Chikimax 


= Oh .mods 


*¥ blkosize)/ Clans) dkomaods 


¥ tilkusize);s 


iftidk.caracity < (SZOSHALL_UUK/ Clans) dkomod) ) 


dkosz = DKSMALLs 
else 


if((dkicaeracity »= (SZUSMALLUIN/ Clonmsddkh.imod) &% 
(dkhoicarecity <= SZ_UKMENIUM_DIKD/Clons)Gkomad) ) 
dkoisz = DK. MERIUMS 


else 


ghus2 = DEOLARGEs 
ha.sizeslLumitIjglunmgces_usk] .nhhlocks = 03 


gawitech (die.sz2) <¢ 
cese DIKOSMALL? 


ha sizesCumitgclundjces_kooTI .niblocks = SO BLKSURODOT/dkomods 
ma .sizeslCumitagclundgces_SwaArd .nblocks: = gras gel 
hMau.sizesCumitILlunICKS_FASTI] .mnblocks = S_BLASLUFAST/dkomods 
hea _sizesCuniticlundgces_ RUT) .nblocks = S BLASUROOT/dkomods 
threaks 
case DKUMERIUM? 
ha_sizesCunmiticlundgcres_k0votTi .nfblocks = MOBLAS_ROOT/dkomods 
ha_sizesCumit3JlClunJcFS SWAP .rifblocks = HORLKS SWAP / dk omads 
ha_sizesCunmitjcglunICFSuFaAsTI.nhlocks = MBLASUFAST/dkomods 
hesizesCunitsjclungjers_BooTI] .nklocks = MO OBLASORODOT/dkomods 
hbresk ys 
case TKULARGE: 
ha._sizesCunityclundces ROOT] .nflocks = LOBLKSUROOT/dkoumods 
Nae.sizesCumitaclunILeS SwaAPi.nizslocks = LUBLASUSWAF/ dk omods 
He_sizeslunitIgclundjcrs_FasTi.nblocks = LOBLKRS_FAST/dkoumods 
hesizesCumitIClundJcFS_BOOTI .niblocks = LOUBLKSUROOT/ dk mads 
breaks 
} 
Sz = G5 
Torli=LsickStitsitt) 
sz ¢= hacsizesCunitiClundiCi-Li.nhlocks, 
ifidkomod == SZ512) 
blkomax /= OxOG02Ls 
ha sizeslLunmitIClunIceS_uSkd.milocks = fhlkomax - sas 
Ffor@i=LsisFStisi¢t) A 
he .sizgesCunitIllundIlil.blockoff = 
ha.sizeslunitIjclunsgli-Li.nhlacks + 
ha _sizeslunmitIjclundili-Li blockoff?: 
> 
> 
me.timerd) 
v 
int Sy 
ifihawtinfo Hhaw.tflas == VIMERLRUNNING) < 
ifdhe_tinfo. ha_tmo && --ha_tinfo. fa_tmo == 0) 


ErinthC*HAs command time out\rn'* 


S$ = SPLO)s 


3 
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fifdef 
felce 


fendif 


> 


SUN 
Mmeintridys 


MmeintrCIN?_TMO_LLEVEL Ds 


+ 


Source Listing 


Limeautiha _timers»G»s THOU IANY)s /¥% arm interruret timer ¥*€/ 


te 


ne.stratesyulbep ) /* srecisel for ioctl 
struct buf bry 


¢ 
‘ 


#ifdef 


fendif 


> 


Ssioch.t Ksiochs 
Ccaddrut aeaars 
struct bul kde; 
int sesicdevs 
imt x5 


addr = Ccaddr_t)ire-sb_resids 
sioch = (siocch.t *iiochs 
SUN 

merallociine ) > 


ifiminorébe-Sh_dev) == TARE) < 
bees houfleds j= BUTAFEs 
scsi_dey = tscsidevibrp-Fh_dey) 5 
+ else 
scsi.ideyv = scsidevibr-shodev) 5 
he-Saviforw = NULL?) 
x = SFLO), 
Gr = thetehs 
if(de-Sbhlactf == NULL) 
dreeshlactf = tes 
else 
de-eholsctl-Saviforw = fry 


deevbhlactl = fr; 
bre-vburesid = Cumsigneddiiochs 
be-vboflegs t= BLIOCTLs 
if(dre-Shiscetive == NULL) <£ 
eddarisave = 0; 
hetab.dbisctivetts 
he send scecsi_cmaglprssiochsscsi_dev) 5 
> 


selsdsy) 3 


necommand(scsicdevslunscommandshyute counts dr ) 
imt scsi_devyslunscammandshyte_coumnts 
ceddroit drs 


4 


Figure 2-l. 


imt “xe = Oxbiily 

struct buf Khe = Shahui's 
imt s3 

imt 22 = Oxbbi2s 


2rveas ¥/ 
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f/acdrousave = O09 /*K*/ 

Ss = SPLO)3 

While(thre-rhifleds & B_BRUSY) ¢< 
beeshufleds t= BUWANTERS; 
sleer(lcsddrit)ies PRIBIO) 3 

} 

bree-sboufleds = BLURUSYs 

Sriluids)s 

iffsesi.idey >= TAPE) 


bee-obodevy = O } Clum << SHIFTLUNIT) { tscesi_deyv)3 


else 


Deeobidey = Of: Clum << SHIFT_UNIT) { (sesi_deyv << SHIFTUSCSI); 


beeshweglin = co 
beeshouheount = heute counts 
fhreeshoblkno = Oy 
beeoiholumefwsddr = dey /RE/ 
hastratesy (her) 5 
ifdef SUN 
lowsit(be) 5 
#felse 
ifihelinited == INITTONONE) 
Loweitlir > 5 
else 
mYewiowsitline ds 
fendif 
if(he-Sb_fless % BUWANTER) 
Wekeurllcaddriit) be) 5 
bhreeShbuflaeds = O35 
return(he-Shlerror) 5 
+ 


na wsenagwiscesicomdlbessiochsacsi_dey) 
struct put khes 
Ssiocht €siochs 
int scesiidevs 
£ 
imt Lures is 
cher cy 


if(sioach-Fclun.sh.emd & OxwVoO) I 

lun = sioech-scluin. Ld. lusty 
+} else i 

lum = sloch<-Sclun. sh. lum ilbae2 => SH 
+ 


iff be == (struct fut *) NULL) 
bees resid = Cumsidgnediochs 
else 
tee-cnoresidg = Cumsisgneddisiach 
OUtTHCLNIRs sesiudeyv) 3 /& set SUSY + 
OUTLEC TCR. RI» Ox80) 5 
Outi CO TCRORS »Ox0Ff ) 
outbCTCRORS 0) 5 
ARM. VIMERCTMOLINT) » 
status = G3 
ARIF Cl Chaelinited==INITUDONE)) /**/ 


OuUtKCCMR ACU SWA) 5 /* issue select with ATTN ema 


megoutwhuf = MSGLUIDKR ¢ Lures 
he.setustate flag (SF SEL» TRUE)» 
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TFT OLUN > 


; 
srset device 


R/ 


&/ 


(Cont'd) 


Source Listing 


#ifridef SUN 
/#haudelavt_y ss /#K/ 
fendi 
/*¥ do away and wait on interrurt K/ 


te 


me.settimerd J 


ha.tinfa na _tflaes = TIMER. RUNNINGS 

f/&hautinfo.hawtmo = THDOLINTs /*/ 

timeacutthae timers3» THOLINY)s 7/* arm interrurt timer */ 
+ 


naiomelehaseshufwsddrsivute countsagirection) 
imt rhasersbulwaddrybyte counts directions 
< 

Struct huff Khes 

unseisned int nbhuflsddrs 

unsigned int aeddriiocts 

imt esshicaumts 

long exsytxs 

char alsatsads 


be = hetet.toactfs 
eddroioeh = Cintdiochs/k ¥*/ 
/kaddroiocth = Cintdkiochs /* KRLUNGE to force on error */ 
ifidbufladdr == addreiioch) 13 

Chufladdr == Cint)date_refs) $3 

Chufladdr == Cintdiioch)) 

nhufladdr = LMALANIRGbufladdr)s 

else 


mnhufladdr = (Chr->bifless & B_MAP) ? Cunsisned)be-Sbhoun.boaeddr 


DMALANDR Chufisddr) s 


#ifdef SUN 
ax = mbufleddrs 


felse 
if((Che-Sbflads & BLFHYS) %& (rhase != PHOCOMMAND) ) 
ax = nbufladdrs 
else 
ax = mnhuflsddr + ADR. CONS 
iffbufloaddr == Cintdeta_refs) 
ax = mbufladdr + ANLRROICONYVs 
fendift 


el = ax & Oxnffs 

ez = (ax b> 8) & Oni ts 

a3o= ax *P 16) & Onits 

hyte count 3 

if(Ctlax & OxffFPfLItbevte_count) = OXfFFTL) &2% 

Che-choxmem == 0) <£ 

hucount = Cunsigned)OxLOOOOL - Cax & OxPffFTL)s 
eddriseve = hr-Fbhoun boladdrs 
fee Shuhcaunt = fee-lbhocoumt -— fhocounts 
beeohlune fbuwsddr += bocounts 
bhyutewcount = tucount - 15 
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outh COMA. HASK » DMALCHNLUMASR ) 5 /% set channel mask Hit 


outE CIMA. CREF 20)» /% clear tute rtr flir/flaor 
outh CIMA. MONE» direction) 3 /*% DMA direction? in or out 
outh CIMA CNT sbete count) /% low bete af count 
outh (hha CONT sbyte count: =SHIFTUBYTE)s /*K fish bhete of count 
Guth CIMA AIR, st) s /* low addr fete */ 
OUTHONMAL AIR: ae2)5 /K Hhish addr tute K/ 

#ifdef SUN 
OUTERCIMALPR:s e435 /K 24°38 of addr */ 

felse 
iftihe-ch flags & BLUFHYS) 2% (rhase f= FHOCOMMAND) ) 

a5 = fipe->boxmems 

OUtTHONMALER,s e3)3 /K 2P4ATS of addr ¥/ 

fendift 
OuUtTHORMALAASK sIMALSRT) 5 /* clear channel mask. 
returnlnyte counmtt dd» 

+ 


nNeideteirhaselrhsseshufisddrstiiyvte count) 
imt ehasershufw addresthute counts 


\ 


struct huff *hry; 


Slochut Ksioch = tochs 
refs.t kde = dste_refs; 
int iskomodesrFia = Os 
char aa 


ifirehase == PHIIN MATA) £ 
made = DMALIN: 
ha.setuistate flas(SF_o10 | SF_LRAT,s TRUE)» 
+ @else T 
modge = ThA .OUTSs 
hasetistate _flas(*SF_LTO,FALSE): 
hewsetustateflesiSFoUATs TRUE) s 
} 
tr = fateh, boactt s 
if((sioch--clun.sh.emg == OCLUSENSE) 2% (Cire = 
byte lcoumt = SZUREPLYs 
hufwaddr = Cunsisned intidate_retfss 


it 
en 
aa 
rm 
rT 
?* 


} 

betewcaunt = ha.dmalrehase huf_sddrsbyte counts made) 3 
OUTEHCOTCORIURS shutevcount &> SHIFTUWORD) » 

QuthO TCR Be sheteccount =o SHIFTUBYTE) > 

GytHC TCR. RL sbyete count) 3 

OutHICHMReACLUTI | CHRO NMAIs /K issue trensfer command */ 


+ 


Me.cma .ehaselsiach) 
siochu.t Ksiochs 


Ay 


‘ 


hea_dma(PH COMMAND» siochs MAX. BYTES. ITOCKR»s RHALOUT)D > 
outhCTCROURDT» HAX LRYTES_W LOCK) 5 

OUtTKC TOR RS 9G) 5 

OUtHCTCR ORS 2G) 5 

outaCCMRsACLUTI | CREO IMADS 7K issue transfer command */ 
he.setuistate_flas(*(SF_10 {| SF_USEL)»sFALSE)s 


4 
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He status rhsese dé) 


ae 
outeCCMRsACUTIO t CMROBYT) 5 
haiwrelse loorwand(Ask sy ASR NAT) 3 
ha _setuistate_fles(SkFo10» TRUE) > 
return CinmbdMAR) ds 
> 
Hs .outmes rheselimss) 
imt msgs 
£ 
OuUthKCCMResACLUTI | CMROLRY Ts /% issue simsle bute trans ¥€/ 
outoclARy mss) s /& send mss */ 
ha_setustate _flas@“SF_LUs FALSE) » 
} 
ne inmssgerhaese ( ) 
£ 
OUtECCMRsACUTIO § CMRORYT)s /*% issue simsle thyute trans */ 
nha.wfalse_loorwon (Asks ASR.NAT) » 
ha set_state_flas¢(Sk MSGI {| SFO10s TRUEDs; 
return CinhCTAR) ds 
> 


Haiset state _flasg(mask»mode) 
unsigned int masks 
imt modes 


£ 
struct buf Kbrs 
int unsigned word; 
word = state fleas; 
if (mode) 
steste_flad = word | masks 
else 
: state_flag = word & masks 


ha_sgetstatefles() 
£ 
struct huf Kher; 


return(stste_flsg)s 


> 

nHaevelmssindluin) 

imt lLluris 

ae 
imt ahort = FALSESs 
int i; 


hasetstate_flasg(*SF_MSGI»FALSE)» 
if@! thse _sgetustate_flag()) &% SFLART) WY 
ifimssinitbury & BITLUNIT) /% WMSGCOIN K/ 
if((mssin.bhuf & MASKUUNIT) {$= lund x 
status = EC_SUCUSIs /* SUSI interfece errar */ 
short = TRUE, 
Figure 2-1. Source Listing for Xenix Driver Example (Cont'd) 
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} 
+ else 
Switch (mssinebut) 
case MSG_CME? /k commana comelete ¥/ 
status = ECLNORMAL» 
ha_set_stste_flsas(St_ CMF s TRUE) s 
bresks 
case MSG_NCNS /%& disconnect ¥/ 
hea_setuistate_flas(SkF_ MCN», TRUE) 5 
bresks 
csse MSGUSIF? /K csve gata rointer 4/7 
ifiha_sgetuistsate_flssi) & SF_LKRAT) 
if@@iszinmh(TCR_BS)) f= 0) LX 
i= 0: CinbiTCRUB2) <2 SHIFTUBYTE) 
>; CinmbeTCRUBIL) & MASKOUBYTEDs 
/X need more code here */ 
} 
bresks» 
gsse MSGULCU: /* linked command complete £€/ 
case MSG_LUF?% /& linked cmd cmelt & tles */ 
tbresks 
case MSG_UMFES /k message rarity error #&/ 
status = EUCLPARITYs 
atort = TRUE, 
bresk.» 
case MSG_RE JS /& messege resected */ 
status = ECLSCSIs 
abort = TRUES 
breaks 
defaeult3 
Printfi'HAs invelid mssin codet Ze \rn*s 
mSSinehuft ds 
+ 


> 


ifCahbort) it 

hasetistste _flas(SF_UART» TRUE) 5 

mssoutcuhnuf = MSGLARTs 

OUTHC CMR ACLATN) » /& set attention X/ 
> 


outhbCChRs ACLUMA) 5 /k message sccerted x / 
} 


Nea hedrhaselrinsse) 
imt rhases 
at 


1 
oe 


ne_scelavidelsay) 
imt delexys 


& 


‘. 
longs iydoks 
kt = (lomnsJdelay K OxiSOoOLs 
fordi=Ositksitt) 
j= Jy 
} 


Figure 2-1. Source Listing for Xenix Driver Example (Cont'd) 
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ma.clearwiochbisioch) 
siocbut Kksiachs 
£ 


imt is 
forlisOsichAX.IOCB_SZsit¢4) 
Siocbh-Scuwun.esshuflid = OF 
} 
nme wfalseloorwantaddrsmastk.) /& waits until signal goes true *«/ 
imt sddrsmasks 
£ 
imt cyvi=03 
while t!(@Ce=iniladdryemask)) & maskd) # 
ifGit+ == MAX.WAITUTIME) <¢ 
iftha_debus == 1) rrintflCtHA? timeout\mn "ds 
/€4if Cha _dehugs == 1) dhslOd5*/ 
breaks 
} 
} 
f/€return €cds /#K&*/ 
> 
ne_wtrue_loorwonladdrsmast.) /%& waits until signal goes felse */ 
imt addrsmesks 
t 
int c»i=O0;5 
while(lc=inbleddrymask)) & mask) £ 
ifCit+ %= MAX..WAIT_TIME) < 
if(ha_debus == 1) erintfCTHA? timeout\m")s 
bresks 
} 
} 
/kreturn(a) s /KK/ 
> 


naireser() 


outh(GCKsGCRURST ) 3 
/kha delay (SO) 5 /k*/ 
OUTHCRSRR»O0)5 /K K/ 
inh GSR) > 
inb (GSR) > 

} 


neasrecielicmds (tare lor scmd) 
imt tare wvorscmds 
w* 
“A 
Silo0ocon.t Ksioch = iochs 


switch femd) < 
case OCUSENSE? 
Slocih-*clune sh ermtuunithlke = SZUREPLYs 
break.» 
case UCLUREZERO? 
f/kease OCUREWINKD? */ 
case OUCLCARPACITY? 


Figure 2-1. Source Listing for Xenix Driver Example (Cont'd) 
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Cese 


Cease 


Cese 


Cese 


a 
x 


OC UREADY ? 
sioch-Sc_un. sh emnumplks = Os 
breaks 
OC_LFMUWRITE? 
sioch-Sclune sh emumiblks = 1s /& file marks to write 
breaks 
OC_LINQUIRY: 


sioch-Scuui. sh emuniblks = 105 
break y 
OC ULOARY 


if(taerewor) i 
ifthe torent lO) 


¥/ 


sioch-Sclun. she numuhlks = RESETULOAR_LBITs 


else 
sioch-Sc_un. sh mumublks = SET_LOANRLBITs 


bhresks 


maerruhandler(devssts: status) 
int devssts»statuss 


° 
“ 


Slochkt Ksiaoch = iochs 


refsit 


Key 


imt ssscsiidevs lurns 
imt s.code»sfeilure = TRUES 


scsi.dey = (minoridev) >= TAPE) ? tscsidevidev) +: scsidevidev)s 


Lurs 


scesilum (dev); 


ifiststus != 0) € 
Switch (stetus) 4 
cease ECUSEL_TO? 


iftihecinited == INITUNUNE) 
erintéC*HA: Selection Timeouwt\n" ) 3 


cpesky 
default: 
PrintTCSHAS sts = Zx\n"sstatus) s 
bresk»> 
} 
} 
switch (sts) <{ 
case CS_PE? 
Frintfi*FParity error ni’ )35 
breaks 
case CS_RSY: 
erintfi*Tardet is tusy, SCSI device Z2ds Lum Acd\rit» 
SCSiigevs lum) s 
breaks 
case CUS ICS?3 
rrintf(*Intermediate comrletion status\n*)3s 
oresk.s 
case CS UREC? 
case CS UERR? 


Figure 2-l. 


Ssioch- Scum. sthecemd = UCLSENSES 
sioch-sclune she lunmwlbae = O | Clunm << SHIFTULUN) s 
sioch-Sclumeshelhai = Oy 

sioch—--clumesh.,lbsd = O% 

sioch-rclun sh mumiblks = SZ_UREPLY» 

de = dets_ref's: 
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he _sendeisesi_cmad(Ossiochsysesiidev) 5 /KK/ 

haGgelavilds 

6 = selOc), 

hadelay(S)s5 

de = date refs; 

Selxds) 

Ss.code = gr-Srolum. ext sense. sense keys 

if(s.code “<= EX.RECLERRUR) 2 /*% recovershle error */ 


failure = FALSE, 7% mot valid error */ 
+ else 
if (he winited == INIT_NONE) < 
erintfl*HAserror code=Zx,sERCLAZKsERCHIARAZ Nis » 
s.code & MASKUNIB, 
(dre->riun.eextsense erclilercd +> 4), 
(dr-Sriuneextsense.ercl_ered %& MASK_UNIB))> 
> 
breaks 
> 
returnm(failure) > 
> 
getoied) 
< 
returmésetchart))> FREES 
} 
ging () 
£ 
ifdef SUN 
deus 0G) 5 SRE? 
fendaift 
} 


ifndef SUN 
multinemCaddr) 
imt addrys 
< 

returnladdrds 
} 


suSshort Cw »w2) 
int whewes 

C} 

fendif 


MWe. Lowes t Cire > 
etLruct tuff brs 
£ 


imt Goi = 0; 


WhileCibe-Sb flads & BLUIOQNR) == 0) 
&$ = gelOd)s; 
hHaedelaviids 
Sselyds)s 
ifdit+ & BS) <4 
oreak. s 


ai 


+ 


if(i > 25) 
hainterCINTTMOQ.LEVEL D3 


Figure 2-1. Source Listing for Xenix Driver Example (Cont'd) 
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our publication. 
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